ButtonMessageOBJ  METHODS

  constructor Init(Style:byte;Tit:string);
  destructor  Done;
  procedure   AddLine(Str:string);
  procedure   Show;
  procedure   SetOption(Str:string;Hotkey:word);
  function    WinForm: WinFormPtr;